home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-08-28 | 743 b | 44 lines | [TEXT/MPS ] |
-
- {
- Created: Saturday, July 27, 1991 at 10:14 PM
- OSEvents.p
- Pascal Interface to the Macintosh Libraries
-
- Copyright Apple Computer, Inc. 1985-1992
- All rights reserved
-
- *** Warning: This is an alpha version of the Interfaces for Cube-E.
- *** Things may change. Caveat Programmer.
-
-
- }
-
-
- {$IFC UNDEFINED UsingIncludes}
- {$SETC UsingIncludes := 0}
- {$ENDC}
-
- {$IFC NOT UsingIncludes}
- UNIT OSEvents;
- INTERFACE
- {$ENDC}
-
- {$IFC UNDEFINED UsingOSEvents}
- {$SETC UsingOSEvents := 1}
-
- {$I+}
- {$SETC OSEventsIncludes := UsingIncludes}
- {$SETC UsingIncludes := 1}
- {$IFC UNDEFINED UsingEvents}
- {$I $$Shell(PInterfaces)Events.p}
- {$ENDC}
- {$SETC UsingIncludes := OSEventsIncludes}
-
-
- {$ENDC} { UsingOSEvents }
-
- {$IFC NOT UsingIncludes}
- END.
- {$ENDC}
-
-